home *** CD-ROM | disk | FTP | other *** search
/ Robotics & Artificial Int…3 (Professional Edition) / Robotics & Artificial Intelligence Tools 2003 (Professional Edition).iso / neural network tool and application / nsinstall.exe / data1.cab / InteractiveBook_Files / Examples / Chapter1 / R-value / 3 add backprop.nsm < prev    next >
Encoding:
Text File  |  2002-03-08  |  1.5 KB  |  39 lines
  1. ////activeBreadboard. lockWindowUpdate()
  2. //
  3. // This macro creates the standard linear regression breadboard
  4. //
  5. subtitleTextBox. setText ("")
  6. mainTextBox. setText ("")
  7. //
  8. activeBreadboard. stampOnAndMove ( "BackStaticControl" , "control" )
  9. activeBreadboard. select ( "controlBackprop" , FALSE )
  10. controlBackprop. allocateBackpropPlane (  )
  11. activeBreadboard. select ( "r2DLLBackprop" , FALSE )
  12. activeBreadboard. cutSelection (  )
  13. activeBreadboard. select ( "arrowEngine" , FALSE )
  14. activeBreadboard. cutSelection (  )
  15. activeBreadboard. select ( "hidden1SynapseBackpropGradient" , FALSE )
  16. hidden1SynapseBackpropGradient. setStepSize ( 0.005000 )
  17. control. setEpochs ( 200 )
  18.  
  19. activeBreadboard. select ( "WeightTextBox" , FALSE )
  20. activeBreadboard. select ( "WeightEditBox" , TRUE )
  21. activeBreadboard. select ( "BiasTextBox" , TRUE )
  22. activeBreadboard. select ( "BiasEditBox" , TRUE )
  23. activeBreadboard. cutSelection (  )
  24. hidden1Synapse. setWeightMean ( 1.000000 )
  25. outputAxon. setWeightMean ( 1.000000 )
  26.  
  27. //
  28. // fill in text
  29. //
  30. TextBoxPath = macro. pathFromMacro("textBox1.txt")
  31. NextMacroPath = macro. pathFromMacro ( "4 summary.nsm" )
  32. nextButton. setMacroPath ( NextMacroPath )
  33. CancelMacroPath= macro.pathFromMacro("..\minimize.nsm")
  34. cancelButton. setMacroPath ( CancelMacroPath)
  35. TitleIndex = titleTextBox. setTextFromFile (TextBoxPath,0)
  36. SubtitleIndex = subtitleTextBox. setTextFromFile (TextBoxPath, 0)
  37. MainIndex = mainTextBox. setTextFromFile (TextBoxPath, 0)
  38. ////activeBreadboard. unlockWindowUpdate()
  39.